home *** CD-ROM | disk | FTP | other *** search
/ Aminet 40 / Aminet 40 (2000)(Schatztruhe)[!][Dec 2000].iso / Aminet / comm / tcp / Amster.lha / Amster_Install / Rexx / PlayTMLG.rexx < prev    next >
OS/2 REXX Batch file  |  2000-04-22  |  270b  |  19 lines
  1. /*
  2. ** Play
  3. */
  4.  
  5. playerpath = 'Apps:Sound/Players/TMLG/TheMpegaLibraryGui'
  6.  
  7. parse arg filename
  8. options results
  9.  
  10. if ~show('P','TMLG.1') then address command 'Run <>NIL: 'playerpath
  11.  
  12. do while ~show('P','TMLG.1')
  13.    call delay(50)
  14. end
  15.  
  16. address 'TMLG.1'
  17.  
  18. 'PLAY NAME 'filename
  19.